set %okienko SHT ; po kazdej zmianie clienta nalezy sprawdzic czy sie nie zmienilo #contkind, przy obecnym jest SHT
initevents
loop:

if ( #contkind = %okienko )
{
set #scnt 0
hoko:
if ( #contkind = %okienko ) && ( #scnt > 7 )
{

sound d:\beep.wav
wait 10
sound d:\beep.wav
wait 10
sound d:\beep.wav
wait 10
sound d:\beep.wav
wait 10
sound d:\beep.wav
wait 10
sound d:\beep.wav
wait 10
sound d:\beep.wav
}
if ( #contkind = %okienko ) && ( #scnt < 20 )
goto hoko

}
goto loop